home *** CD-ROM | disk | FTP | other *** search
/ Network CD 2 / Network CD - Volume 2.iso / disks / serlinkv1.3c.dms / serlinkv1.3c.adf / Installer < prev    next >
Encoding:
Text File  |  1995-03-20  |  6.3 KB  |  193 lines
  1. Failat 21
  2. Set >Nil: SerLinkVer V1.3c
  3. Set >Nil: ExeVer V1.3a
  4. Assign Serlink1: ""
  5. If Exists "S:Disk.ID" 
  6.  
  7. Echo "*e[1;1H*e[J"
  8.  Echo "*e[1;32m _________________________________________________________________________"
  9.  Echo " *e[43m                                                                         *e[0m"
  10.  Echo " *e[0;32;43m                Serlink $SerLinkVer Installation ©1995 C.Wilkinson*e[1m             *e[0m"
  11.  Echo " *e[1;4;43m                                                                         *e[0m"
  12.  Echo " "
  13.  Echo " "
  14.  Echo "           S O R R Y !!"
  15.  
  16. Echo " Serlink $SerLinkVer cannot be installed to this master disk, "
  17.  Echo " Please Boot your hard drive or use this disk to start Ser-link"
  18.  Echo " "
  19.  Echo Noline "[Return]"
  20. Set >Nil: Return ?
  21. Skip Quit
  22. Endif
  23. Lab Start
  24.  
  25. Echo "*e[1;1H*e[J"
  26.  Echo "*e[1;32m _________________________________________________________________________"
  27.  Echo " *e[43m                                                                         *e[0m"
  28.  Echo " *e[0;32;43m                Serlink $SerLinkVer Installation ©1995 C.Wilkinson*e[1m             *e[0m"
  29.  Echo " *e[1;4;43m                                                                         *e[0m"
  30.  Echo "*N*N*n*n                   What Do You Want To Install."
  31.  Echo " "
  32.  Echo "                           A) All Ser-link Package $SerLinkVer"
  33.  Echo " "
  34.  Echo "                           B) Ser-Link $SerLinkVer"
  35.  Echo " "
  36.  Echo "                           C) Remote Execute $ExeVer"
  37.  Echo " "
  38.  Echo "                           Q) Abort Installation"
  39.  Echo " "
  40.  Echo noline "                  *n Please Select (A,B,C,Q) "
  41.  
  42.  
  43.  
  44.  
  45. Set >Nil: FindPackage ?
  46.  
  47.       if $FindPackage eq "a"
  48.         Set >Nil: Full yep
  49.         Set >Nil: Serlink yep
  50.         Set >Nil: RemoteExecute yep
  51.         skip InstallPath
  52.        endif
  53.  
  54.       if $FindPackage eq "b"
  55.         Set >Nil: Serlink yep
  56.         skip InstallPath
  57.       endif
  58.  
  59.       if $FindPackage eq "c"
  60.         Set >Nil: RemoteExecute yep
  61.         skip InstallPath
  62.       endif
  63.  
  64.       if $FindPackage eq "q"
  65.         echo "Installation Aborted!"
  66.         wait 1
  67.         Skip Quit
  68.       endif
  69.  
  70. skip back Start
  71.  
  72.  
  73. Lab InstallPath
  74. Echo "*e[1;1H*e[J"
  75.  Echo "*e[1;32m _________________________________________________________________________"
  76.  Echo " *e[43m                                                                         *e[0m"
  77.  Echo " *e[0;32;43m                Serlink $SerLinkVer Installation ©1995 C.Wilkinson*e[1m             *e[0m"
  78.  Echo " *e[1;4;43m                                                                         *e[0m"
  79. Echo " "
  80. Echo " "
  81. Echo noline "         Enter Destination Path to Install Ser-Link To (Ie Dh0:) "
  82. set >Nil: Path ?
  83. if >Nil: not exists $Path
  84.       Echo " Wrong Path, Does not exist! try Again...*n"
  85.       Wait 1
  86. skip back InstallPath
  87. endif
  88. Echo " "
  89. Assign >Nil: Serlink: $Path
  90. Makedir >Nil: Serlink:Serlink
  91. Copy >Nil: Serlink1:S/Serlink.Info Serlink:
  92. ;--------------------------------------------------------Install Full Package
  93. If $Full eq "yep"
  94. Echo "*e[1;1H*e[J"
  95.  Echo "*e[1;32m _________________________________________________________________________"
  96.  Echo " *e[43m                                                                         *e[0m"
  97.  Echo " *e[0;32;43m                Serlink $SerLinkVer Installation ©1995 C.Wilkinson*e[1m             *e[0m"
  98.  Echo " *e[1;4;43m                                                                         *e[0m"
  99.  Echo " "
  100.  Echo " "
  101. Echo " "
  102. Echo "Installing Full Serlink $SerLinkVer Package"
  103. Echo " "
  104. Echo " "
  105. Endif
  106.  
  107. ;--------------------------------------------------------Install Serlink
  108. If $Serlink eq "yep"
  109. Echo " Installing Serlink to $Path/Serlink"
  110. Echo " "
  111. Echo noline " Serlink $SerLinkVer.........."
  112. Copy >Nil: Serlink1:Ser-Link_Server#? Serlink:SerLink
  113. Echo "Done"
  114. Echo noline " Serlink Remote $SerLinkVer..."
  115. Copy >Nil: Serlink1:Ser-Link_Remote#? Serlink:SerLink
  116. Echo "Done"
  117.  
  118. if not exists S:Serlink.Scripts
  119.     Echo noline " Installing S:Serlink.Scripts to S:...."
  120.       Copy >Nil: Serlink1:S/Serlink.Scripts S:
  121.     Echo "Done"
  122. Endif 
  123. Echo " "
  124. Echo noline " Iconified SerLink Icon To Env-Arc:Sys/ & Env:Sys/..."
  125. Copy >Nil: Serlink1:Prefs/Env-Archive/Sys/Server.info Sys:Prefs/Env-archive/Sys/ 
  126. Copy >Nil: Serlink1:Prefs/Env-Archive/Sys/Server.info Ram:Env/Sys/ 
  127. Echo "Done"
  128. Echo " "
  129.  
  130. Endif
  131. ;--------------------------------------------------------Install Remote Execute Package
  132. If $RemoteExecute eq "yep"
  133.  
  134.  
  135.         If not exists S:RemoteExecute.Cfg
  136.           Echo noline " Installing RemoteExecute.Cfg to S:..."
  137.           Copy >Nil: Serlink1:S/RemoteExecute.Cfg S:
  138.           Echo "Done"
  139.         Endif
  140. Echo Noline " Installing Remote Execute $ExeVer............."
  141.                                                         
  142. Copy >Nil: Serlink1:Remote_#? Serlink:Serlink
  143. Echo "Done"
  144. endif
  145. ;--------------------------------------------------------Install Xprd
  146. Lab InstallXprd
  147. Echo Noline " Installing Xprd to C:......................."
  148. Copy >Nil: Serlink1:C/Xprd C:
  149. Echo "Done"
  150. ;--------------------------------------------------------Install Fonts
  151. Lab InstallFont
  152. Echo Noline " Installing Serlink Fonts to Fonts:.........."
  153. Makedir >Nil: Fonts:Serlink
  154. Copy >Nil: Serlink1:Fonts/Serlink.Font Fonts:
  155. Copy >Nil: Serlink1:Fonts/Serlink/#? Fonts:Serlink/
  156. Echo "Done"
  157. ;--------------------------------------------------------Install Libraries
  158. Lab InstallLibrary
  159. if not exists Libs:xprzmodem.library
  160.  Echo Noline " Installing Xprzmodem.library to Libs:......."
  161.  Copy >Nil: Serlink1:Libs/xprzmodem.library Libs:
  162. Echo "Done"
  163. endif
  164. ;--------------------------------------------------------Install Serial Device
  165. Lab InstallSerialDevice
  166. If not Exists Devs:Serial.Device
  167.  Echo Noline " Installing Serial.Device to Devs:..........."
  168.  Copy >Nil: Serlink1:Devs/serial.device Devs:
  169. Echo "Done"
  170. endif
  171. ;-------------------------------------------------------Install Documentation
  172. Lab InstallDocs
  173. Echo Noline " Installing Documentation to $Path/SerLink...."
  174.  Copy >Nil: Serlink1:Serlink.Guide#? Serlink:Serlink/
  175. Echo "Done"
  176. ;--------------------------------------------------------Quit & Clean Up
  177. Copy >Nil: Serlink1:C/Run C:
  178. Copy >Nil: Serlink1:Installer#? Serlink:Serlink/
  179. ;Copy >Nil: Serlink1:S/Disk.ID#? S:
  180. Echo " "
  181. Echo "Installation Complete "
  182. Echo " "
  183. Echo "Serlink Can Be Found In $Path/Serlink Drawer"
  184. Echo " "
  185.  
  186. Echo Noline " [Return]"
  187.  
  188. Set >Nil: Return ?
  189. Lab Quit
  190. Assign >Nil: Serlink: Remove
  191. Assign >Nil: Serlink1: Remove
  192. Endif
  193.